home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / ms_dos / disp / disp.c < prev    next >
C/C++ Source or Header  |  1993-11-30  |  9KB  |  388 lines
  1. /*
  2.  * Dipsray Speed Checker ver 1.0 1993/05/03
  3.  *
  4.  * ----- 目的
  5.  * コンソールの表示速度を計測する実験用programです
  6.  * あなたの環境での表示速度を教えて下さい
  7.  *
  8.  * パラメーターで指定した表示ルーチン(複数指定可)を使用して画面表示を行い
  9.  * その実行時間を表示します｡
  10.  *
  11.  * ----- 使用方法 : usage()も参照して下さい
  12.  * MS-DOSの標準入力に表示原稿となるファイルをリダイレクトで指定して下さい｡
  13.  *     これを忘れた場合コンソールが直結されるので注意して下さい｡
  14.  *     その場合はctrl-z + cr で終了できます｡
  15.  * 計測値はファイルに書き出されますので'-o'で指定して記録して下さい｡
  16.  * その結果に実行環境を書き添えて頂ければ幸いです｡
  17.  *
  18.  * 実行環境とは実行時の機種･CPU･システムクロック･メモリウェイト
  19.  * CPUキャッシュ制御状態･DOSコンソール名(DOS3.1/T-OS2.1L20/ERICON等)です｡
  20.  *
  21.  * 通信作業時の負荷を調べることができます｡この場合通信ポートをループバック
  22.  * モードに設定します｡表示原稿はいったんシリアルポートから送信され､そこで
  23.  * ループバックして再び受信されます｡このための回線ドライバとしてsiamを利用
  24.  * しますので事前にsiamの常駐をすることと､事後に常駐を解除(siam /r)する
  25.  * ことを忘れないで下さい｡
  26.  *
  27.  * 推奨する作業手順をバッチファイルにして同梱します｡(FMRの場合)
  28.  *   TMENUからコンソールを選び
  29.  *   autodisp kiroku.doc genkou.doc
  30.  *   を実行して下さい｡
  31.  * 生成されたkiroku.docに実行環境をお手持ちのエディタで書き添えて下さい｡
  32.  *
  33.  *  おてすきでしたらこれを実行環境を変えながら繰り返してみてください｡
  34.  *  標準的な386Townの場合､添付原稿を用いると一行程に3分かかります。
  35.  *  標準的な486Townの場合は2分かかります｡
  36.  *
  37.  * ----- 注意事項
  38.  *     486TOWNSの場合は486対応siamを利用して下さい
  39.  *     386FM用siamはsiamfm14.lzhに
  40.  *     mais(DOS汎用)はsiamset1/lzhに入っていますが
  41.  *     一応同梱しておきます｡
  42.  *
  43.  *     なお使用CPUが低速である場合はメーカーの予告どおり
  44.  *     高速通信時に文字抜けが発生しますが気がついたら教えて下さい｡
  45.  *
  46.  * ----- 互換性
  47.  * BIOSと書いている表示ルーチンを使う場合はFMR-BIOS依存です｡
  48.  * siamはその機種用のsaimが存在すれば利用できます｡
  49.  * その点に注意すればDOS汎用で動作します｡
  50.  *
  51.  */
  52.  
  53.  
  54. #include <dos.h>
  55. #include <stdio.h>
  56. #include "siam.h"
  57.  
  58. void
  59. usage()
  60. {
  61.     fputs("Usage: disp -[2|9|h|c|b|s|?] { -o ostream } < istream \n" , stderr ) ;
  62.     fputs("version 1.0 1993/05/03 Must be in SHIBUYA\n" , stderr ) ;
  63.     fputs("       ?: <<<文字表示速度計測programです>>>\n" , stderr ) ;
  64.     fputs("       2: int21h func 2   Display Character\n" , stderr ) ;
  65.     fputs("       9: int21h func 9   Display String\n" , stderr ) ;
  66.     fputs("       h: int29h 非公開MS-DOS高速コンソール出力\n" , stderr ) ;
  67.     fputs("       c: FMR BIOS int91h ah=1d コンソール一文字出力\n" , stderr ) ;
  68.     fputs("       b: FMR BIOS int91h ah=1e コンソール文字列出力\n" , stderr ) ;
  69.     fputs("       s: siamを経由して表示します(未実装)\n" , stderr ) ;
  70.     fputs("       o: 後続のパラメータostreamとして指定する\n" , stderr ) ;
  71.     fputs(" ostream: 計測結果記録ファイル名\n" , stderr );
  72.     fputs(" istream: 表示用原稿名(MS-DOSリダイレクトで指定)\n" , stderr ) ;
  73.     fputs("          ↑指定を忘れたらctrl-z,crで終了☆\n" , stderr );
  74. }
  75.  
  76. char t[600];
  77. FILE *f ;
  78.  
  79. void do2() ;
  80. void do9() ;
  81. void doh() ;
  82. void doc() ;
  83. void dob() ;
  84. void illegal() ;
  85. void nopara() ;
  86. unsigned long tim() ;
  87. void setup( FILE* in ) ;
  88. char* lineinput( char* in ) ;
  89.  
  90.  
  91. int
  92. main( int argc , char* argv[] )
  93. {
  94.     int i ;
  95.     char *p ;
  96.     union REGS r ;
  97.     union {
  98.         long c ;
  99.         struct {
  100.             unsigned int21_CH : 1 ;
  101.             unsigned int21_S : 1 ;
  102.             unsigned int29h  : 1 ;
  103.             unsigned bios_CH : 1 ;
  104.             unsigned bios_S  : 1 ;
  105.             unsigned help    : 1 ;
  106.             unsigned illegal : 1 ;
  107.             unsigned ostream : 1 ;
  108.             unsigned ferror  : 1 ;
  109.             unsigned usesiam : 1 ;
  110.             } b ;
  111.         } cmdmap ;
  112.     cmdmap.c = 0 ;
  113.     f = NULL ;
  114.  
  115. /*  --------------------
  116.  *  パラメータリスト解析
  117.  */
  118.     for( i=1 ; i < argc ; i++ ) {
  119.         if( argc < 2 ) break ;
  120.         p = argv[i] ;
  121.  
  122.         /*  -o option が指定された次のパラメータリストは出力パス名  */
  123.         if( cmdmap.b.ostream ) {
  124.             if( ! ( f = fopen( p , "a" ) ) ) {
  125.                 cmdmap.b.ferror = 1 ; break ; }
  126.             cmdmap.b.ostream = 0 ;
  127.             continue ;
  128.             }
  129.  
  130.         /*  パラメータスイッチを使うなら'/' or '-'を要求する */
  131.         /*  じつはなくても構わない     */
  132.         if( *p != '/' && *p !='-' ) --p ;
  133.  
  134.         while( *(++p) ) {
  135.             switch( *p ) {
  136.             case '2' : cmdmap.b.int21_CH = 1 ; break ;
  137.             case '9' : cmdmap.b.int21_S  = 1 ; break ;
  138.             case 'h' : cmdmap.b.int29h   = 1 ; break ;
  139.             case 'c' : cmdmap.b.bios_CH  = 1 ; break ;
  140.             case 'b' : cmdmap.b.bios_S   = 1 ; break ;
  141.             case '?' : cmdmap.b.help     = 1 ; break ;
  142.             case 'o' : cmdmap.b.ostream  = 1 ; break ;
  143.             case 's' : cmdmap.b.usesiam  = 1 ; break ;
  144.             default  : cmdmap.b.illegal  = 1 ; break ;
  145.             }
  146.         }
  147.     }
  148.  
  149. /*  ---------------------------------
  150.  *  パラメータエラー･初期化不良の検出
  151.  */
  152.  
  153.     if( cmdmap.b.ostream ) {
  154.         fputs("記録用ファイル名も指定して下さい｡\n", stderr ) ;
  155.         return 5 ;
  156.         }
  157.     if( cmdmap.b.ferror ) {
  158.         fprintf(stderr, "記録ファイル %s はエラーのため使用できません" , p ) ;
  159.         return 4 ;
  160.         }
  161.  
  162.     if( cmdmap.b.usesiam ) {
  163.         /*  siam常駐チェック  */
  164.         for( i = 0 ; i < MAX_PORT ; i++ ) {
  165.             r.x.ax = MAGIC_NO ;
  166.             r.h.bh = i ;
  167.             r.h.bl = FN_NO_SIAM ;
  168.             int86( 0x2f , &r , &r ) ;
  169.             if( r.x.bx == MAGIC_NO2 ) break ;
  170.             else r.x.ax = 0 ;
  171.             }
  172.         fp_siam = (funcptr far *)( (unsigned long) r.x.ax << 16);
  173.         }
  174.  
  175.  
  176.  
  177.  
  178.     if( cmdmap.b.illegal  ) {
  179.         fprintf(stderr, "i?29hcb : %1d%1d%1d%1d%1d%1d%1d\n" ,
  180.             cmdmap.b.illegal ,cmdmap.b.help ,cmdmap.b.int21_CH ,
  181.             cmdmap.b.int21_S ,cmdmap.b.int29h ,cmdmap.b.bios_CH ,
  182.             cmdmap.b.bios_S ) ;
  183.         illegal() ;
  184.         return 2 ;
  185.         }
  186.  
  187. /*  ----
  188.  *  分岐
  189.  */
  190.  
  191.     if( cmdmap.b.help     ) usage() ;
  192.     if( cmdmap.b.int21_CH ) do2() ;
  193.     if( cmdmap.b.int21_S  ) do9() ;
  194.     if( cmdmap.b.int29h   ) doh() ;
  195.     if( cmdmap.b.bios_CH  ) doc() ;
  196.     if( cmdmap.b.bios_S   ) dob() ;
  197.     if( cmdmap.c == 0 ) { nopara() ; return 3 ; } ;
  198.     return 0 ;
  199. }
  200.  
  201. void
  202. do2()    /*    -----    int 21h func 2 : スクリーン文字出力    -----    */
  203. {
  204.     int c ;
  205.     char *p ;
  206.     union REGS r ;
  207.     unsigned long ti ;
  208.  
  209.     setup( stdin ) ;
  210.     ti = tim() ;
  211.  
  212.     while( p = lineinput( t ) ) {
  213.         while ( *p != '$' ) {
  214.             r.h.ah = 2 ;
  215.             r.h.dl = *p++ ;
  216.             intdos( &r , &r ) ;
  217.         }
  218.         r.h.ah = 2 ;
  219.         r.h.dl = 0x0d ;
  220.         intdos( &r , &r ) ;
  221.         r.h.ah = 2 ;
  222.         r.h.dl = 0x0a ;
  223.         intdos( &r , &r ) ;
  224.     }
  225.  
  226.     ti = tim() - ti ;
  227.     if( f ) fprintf(f,"2:%5lu0ms\n", ti ) ;
  228.              printf(  "2:%5lu0ms\n", ti ) ;
  229. }
  230.  
  231. void
  232. do9() /*    -----    int 21h func 9 : スクリーン文字列出力    -----    */
  233. {
  234.     int c ;
  235.     char far *p;
  236.     union REGS r ;
  237.     struct SREGS s ;
  238.     unsigned long ti ;
  239.  
  240.     setup( stdin ) ;
  241.     ti = tim() ;
  242.  
  243.     while( p = lineinput( t ) , !feof(stdin) && !ferror(stdin) ) {
  244.         r.h.ah = 9 ;
  245.         r.x.dx = FP_OFF( p ) ;
  246.         s.ds   = FP_SEG( p ) ;
  247.         intdosx( &r , &r , &s ) ;
  248.         r.h.ah = 2 ;
  249.         r.h.dl = 0x0d ;
  250.         intdos( &r , &r ) ;
  251.         r.h.ah = 2 ;
  252.         r.h.dl = 0x0a ;
  253.         intdos( &r , &r ) ;
  254.     }
  255.  
  256.     ti = tim() - ti ;
  257.     if( f ) fprintf(f,"9:%5lu0ms\n", ti ) ;
  258.              printf(  "9:%5lu0ms\n", ti ) ;
  259. }
  260.  
  261. void
  262. doh()    /*    -----    int 29h : 通称高速コンソール出力(ctrl-c無効)    -----    */
  263. {
  264.     int c ;
  265.     char *p ;
  266.     union REGS r ;
  267.     unsigned long ti ;
  268.  
  269.     setup( stdin ) ;
  270.     ti = tim() ;
  271.  
  272.     p = t ;
  273.     while( p = lineinput( t ) ) {
  274.         while ( *p != '$' ) {
  275.             r.h.al = *p++ ;
  276.             int86( 0x29 , &r , &r ) ;
  277.         }
  278.         r.h.al = 0x0d ;
  279.         int86( 0x29 ,&r , &r ) ;
  280.         r.h.al = 0x0a ;
  281.         int86( 0x29 ,&r , &r ) ;
  282.     }
  283.  
  284.     ti = tim() - ti ;
  285.     if( f ) fprintf(f,"h:%5lu0ms\n", ti ) ;
  286.              printf(  "h:%5lu0ms\n", ti ) ;
  287. }
  288.  
  289. void
  290. doc()    /*    -----    FMR BIOS int 91h func 1d : 一文字表示    -----    */
  291. {
  292.     int c ;
  293.     char* p;
  294.     union REGS r ;
  295.     unsigned long ti ;
  296.  
  297.     setup( stdin ) ;
  298.     ti = tim() ;
  299.  
  300.     p = t ;
  301.     while( p = lineinput( t ) ) {
  302.         while ( *p != '$' ) {
  303.             r.h.ah = 0x1d ;
  304.             r.h.al = *p++ ;
  305.             int86( 0x91 , &r , &r ) ;
  306.         }
  307.         r.h.ah = 0x1d ;
  308.         r.h.al = 0x0d ;
  309.         int86( 0x91 , &r , &r ) ;
  310.         r.h.ah = 0x1d ;
  311.         r.h.al = 0x0a ;
  312.         int86( 0x91 , &r , &r ) ;
  313.     }
  314.  
  315.     ti = tim() -ti ;
  316.     if( f ) fprintf(f,"c:%5lu0ms\n", ti ) ;
  317.              printf(  "c:%5lu0ms\n", ti ) ;
  318. }
  319.  
  320. void
  321. dob()    /*    -----    FMR BIOS int 91h func 1e : 文字列表示    -----    */
  322. {
  323.     int c ;
  324.     char far *p;
  325.     union REGS r ;
  326.     struct SREGS s ;
  327.     unsigned long ti ;
  328.  
  329.     setup( stdin ) ;
  330.     ti = tim() ;
  331.  
  332.     p = t ;
  333.     while( p = lineinput( t ) , !feof(stdin) && !ferror(stdin) ) {
  334.         r.h.ah = 0x1e ;
  335.         r.x.cx = 79 ;
  336.         r.x.di = FP_OFF( p ) ;
  337.         s.ds   = FP_SEG( p ) ;
  338.         int86x( 0x91 , &r , &r , &s ) ;
  339.         r.h.ah = 0x1d ;
  340.         r.h.al = 0x0d ;
  341.         int86( 0x91 , &r , &r ) ;
  342.         r.h.ah = 0x1d ;
  343.         r.h.al = 0x0a ;
  344.         int86( 0x91 , &r , &r ) ;
  345.     }
  346.  
  347.     ti = tim() - ti ;
  348.     if( f ) fprintf(f,"b:%5lu0ms\n", ti ) ;
  349.              printf(  "b:%5lu0ms\n", ti ) ;
  350. }
  351.  
  352. void
  353. illegal()
  354. {
  355.     fputs("Illegal parameter exists. Operation is canceld.\n" , stderr ) ;
  356.     usage() ;
  357. }
  358.  
  359. void
  360. nopara()
  361. {
  362.     fputs("Please check parameters.\n" , stderr ) ;
  363.     usage() ;
  364. }
  365.  
  366. unsigned long
  367. tim()    /*    -----    DOS(int21h/func2ch)を利用した時計チェック    -----    */
  368.         /*            FMR の場合は精度が10ms単位です                        */
  369. {
  370.     union REGS r ;
  371.  
  372.     r.h.ah = 0x2c ;
  373.     intdos( &r , &r ) ;
  374.     return ((((r.h.ch * 60 ) + r.h.cl ) * 60 ) + r.h.dh ) * 100 + r.h.dl ;
  375. }
  376.  
  377. void
  378. setup( FILE* in )
  379. {
  380.     rewind( in) ;
  381. }
  382.  
  383. char*
  384. lineinput( char* in )
  385. {
  386.     return gets( in ) ;
  387. }
  388.